-ifndef(H_TSTRING).
-define(H_TSTRING, true).

-record(tstring, {tchar_list, length, width}).

-define(IS_TSTRING(Term), erlang:is_record(Term, tstring)).
-define(TSTRING_LENGTH(TString), ((TString)#tstring.length)).
-define(TSTRING_WIDTH(TString), ((TString)#tstring.width)).
-define(TSTRING(String), tstring:value_of((String))).

-endif.